home *** CD-ROM | disk | FTP | other *** search
/ Aminet 2 / Aminet AMIGA CDROM (1994)(Walnut Creek)[Feb 1994][W.O. 44790-1].iso / Aminet / util / gnu / diff_2_3.lha / diff-2.3 / fnmatch.c < prev    next >
C/C++ Source or Header  |  1993-05-26  |  5KB  |  205 lines
  1. /* Copyright (C) 1991, 1992, 1993 Free Software Foundation, Inc.
  2.  
  3. This library is free software; you can redistribute it and/or
  4. modify it under the terms of the GNU Library General Public License as
  5. published by the Free Software Foundation; either version 2 of the
  6. License, or (at your option) any later version.
  7.  
  8. This library is distributed in the hope that it will be useful,
  9. but WITHOUT ANY WARRANTY; without even the implied warranty of
  10. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11. Library General Public License for more details.
  12.  
  13. You should have received a copy of the GNU Library General Public
  14. License along with this library; see the file COPYING.LIB.  If
  15. not, write to the Free Software Foundation, Inc., 675 Mass Ave,
  16. Cambridge, MA 02139, USA.  */
  17.  
  18. #ifdef HAVE_CONFIG_H
  19. #include "config.h"
  20. #endif
  21.  
  22. #include <errno.h>
  23. #ifndef AMIGA
  24. #include <fnmatch.h>
  25. #else /* AMIGA */
  26. #include "fnmatch.h"
  27. #endif /* !AMIGA */
  28. #include <ctype.h>
  29.  
  30.  
  31. /* Comment out all this code if we are using the GNU C Library, and are not
  32.    actually compiling the library itself.  This code is part of the GNU C
  33.    Library, but also included in many other GNU distributions.  Compiling
  34.    and linking in this code is a waste when using the GNU C library
  35.    (especially if it is a shared library).  Rather than having every GNU
  36.    program understand `configure --with-gnu-libc' and omit the object files,
  37.    it is simpler to just do this in the source for each such file.  */
  38.  
  39. #if defined (_LIBC) || !defined (__GNU_LIBRARY__)
  40.  
  41.  
  42. #if !defined(__GNU_LIBRARY__) && !defined(STDC_HEADERS)
  43. extern int errno;
  44. #endif
  45.  
  46. /* Match STRING against the filename pattern PATTERN, returning zero if
  47.    it matches, nonzero if not.  */
  48. int
  49. fnmatch (pattern, string, flags)
  50.      const char *pattern;
  51.      const char *string;
  52.      int flags;
  53. {
  54.   register const char *p = pattern, *n = string;
  55.   register char c;
  56.  
  57. /* Note that this evalutes C many times.  */
  58. #define FOLD(c)    ((flags & FNM_CASEFOLD) && isupper (c) ? tolower (c) : (c))
  59.  
  60.   while ((c = *p++) != '\0')
  61.     {
  62.       c = FOLD (c);
  63.  
  64.       switch (c)
  65.     {
  66.     case '?':
  67.       if (*n == '\0')
  68.         return FNM_NOMATCH;
  69.       else if ((flags & FNM_FILE_NAME) && *n == '/')
  70.         return FNM_NOMATCH;
  71.       else if ((flags & FNM_PERIOD) && *n == '.' &&
  72.            (n == string || ((flags & FNM_FILE_NAME) && n[-1] == '/')))
  73.         return FNM_NOMATCH;
  74.       break;
  75.  
  76.     case '\\':
  77.       if (!(flags & FNM_NOESCAPE))
  78.         {
  79.           c = *p++;
  80.           c = FOLD (c);
  81.         }
  82.       if (FOLD (*n) != c)
  83.         return FNM_NOMATCH;
  84.       break;
  85.  
  86.     case '*':
  87.       if ((flags & FNM_PERIOD) && *n == '.' &&
  88.           (n == string || ((flags & FNM_FILE_NAME) && n[-1] == '/')))
  89.         return FNM_NOMATCH;
  90.  
  91.       for (c = *p++; c == '?' || c == '*'; c = *p++, ++n)
  92.         if (((flags & FNM_FILE_NAME) && *n == '/') ||
  93.         (c == '?' && *n == '\0'))
  94.           return FNM_NOMATCH;
  95.  
  96.       if (c == '\0')
  97.         return 0;
  98.  
  99.       {
  100.         char c1 = (!(flags & FNM_NOESCAPE) && c == '\\') ? *p : c;
  101.         c1 = FOLD (c1);
  102.         for (--p; *n != '\0'; ++n)
  103.           if ((c == '[' || FOLD (*n) == c1) &&
  104.           fnmatch (p, n, flags & ~FNM_PERIOD) == 0)
  105.         return 0;
  106.         return FNM_NOMATCH;
  107.       }
  108.  
  109.     case '[':
  110.       {
  111.         /* Nonzero if the sense of the character class is inverted.  */
  112.         register int not;
  113.  
  114.         if (*n == '\0')
  115.           return FNM_NOMATCH;
  116.  
  117.         if ((flags & FNM_PERIOD) && *n == '.' &&
  118.         (n == string || ((flags & FNM_FILE_NAME) && n[-1] == '/')))
  119.           return FNM_NOMATCH;
  120.  
  121.         not = (*p == '!' || *p == '^');
  122.         if (not)
  123.           ++p;
  124.  
  125.         c = *p++;
  126.         for (;;)
  127.           {
  128.         register char cstart = c, cend = c;
  129.  
  130.         if (!(flags & FNM_NOESCAPE) && c == '\\')
  131.           cstart = cend = *p++;
  132.  
  133.         cstart = cend = FOLD (cstart);
  134.  
  135.         if (c == '\0')
  136.           /* [ (unterminated) loses.  */
  137.           return FNM_NOMATCH;
  138.  
  139.         c = *p++;
  140.         c = FOLD (c);
  141.  
  142.         if ((flags & FNM_FILE_NAME) && c == '/')
  143.           /* [/] can never match.  */
  144.           return FNM_NOMATCH;
  145.  
  146.         if (c == '-' && *p != ']')
  147.           {
  148.             cend = *p++;
  149.             if (!(flags & FNM_NOESCAPE) && cend == '\\')
  150.               cend = *p++;
  151.             if (cend == '\0')
  152.               return FNM_NOMATCH;
  153.             cend = FOLD (cend);
  154.  
  155.             c = *p++;
  156.           }
  157.  
  158.         if (FOLD (*n) >= cstart && FOLD (*n) <= cend)
  159.           goto matched;
  160.  
  161.         if (c == ']')
  162.           break;
  163.           }
  164.         if (!not)
  165.           return FNM_NOMATCH;
  166.         break;
  167.  
  168.       matched:;
  169.         /* Skip the rest of the [...] that already matched.  */
  170.         while (c != ']')
  171.           {
  172.         if (c == '\0')
  173.           /* [... (unterminated) loses.  */
  174.           return FNM_NOMATCH;
  175.  
  176.         c = *p++;
  177.         if (!(flags & FNM_NOESCAPE) && c == '\\')
  178.           /* XXX 1003.2d11 is unclear if this is right.  */
  179.           ++p;
  180.           }
  181.         if (not)
  182.           return FNM_NOMATCH;
  183.       }
  184.       break;
  185.  
  186.     default:
  187.       if (c != FOLD (*n))
  188.         return FNM_NOMATCH;
  189.     }
  190.  
  191.       ++n;
  192.     }
  193.  
  194.   if (*n == '\0')
  195.     return 0;
  196.  
  197.   if ((flags & FNM_LEADING_DIR) && *n == '/')
  198.     /* The FNM_LEADING_DIR flag says that "foo*" matches "foobar/frobozz".  */
  199.     return 0;
  200.  
  201.   return FNM_NOMATCH;
  202. }
  203.  
  204. #endif    /* _LIBC or not __GNU_LIBRARY__.  */
  205.